home *** CD-ROM | disk | FTP | other *** search
/ EnigmA Amiga Run 1995 November / EnigmA AMIGA RUN 02 (1995)(G.R. Edizioni)(IT)[!][issue 1995-11][Skylink CD].iso / earcd / util / text / xes.lha / XES / S / guesses.xrc < prev    next >
Text File  |  1995-08-14  |  894b  |  12 lines
  1. # $VER: guesses.xrc 1.0 (14 Aug 1995)
  2. loadgtbproject gs XES:GUI/Guesses.gui
  3.  
  4. setmacro gtb-guesses 0 (connectgtbgadget gs gs guesses Guesses opengtbwindow gs gs)
  5.  
  6. setmacro as-as-guess 0 (smv w (Unfound/#\$wnx/*Name*) eval (execute (AlphaSpell >T:temp g \$(\$w) \$gf \$Dict \$UDict)) droplist Guesses rx2 XES:Rexx/LoadList Guesses T:temp gtb-guesses)
  7. setmacro gs-gs-word 1 (set Guess \$arg1)
  8. setmacro gs-gs-guesses 1 (smv w (Guesses/#\$arg1/*Name*) eval (set Guess \$(\$w)))
  9. setmacro gs-gs-guess 0 (execute (AlphaSpell >T:temp g \$Guess \$gf \$Dict \$UDict) droplist Guesses rx2 XES:Rexx/LoadList Guesses T:temp connectgtbgadget gs gs guesses Guesses)
  10. setmacro gs-gs-match 0 (execute (AlphaSpell >T:temp p \$Guess \$Dict \$UDict) droplist Guesses rx2 XES:Rexx/LoadList Guesses T:temp connectgtbgadget gs gs guesses Guesses)
  11. setmacro gs-gs-replace 0 (findstr \$currentword repstr \$Guess replace)
  12.